Public Declare Function GetPixel Lib "gdi32" (ByVal hDC As Long, ByVal X As Long, ByVal Y As Long) As Long
Public Declare Function TextOut Lib "gdi32" Alias "TextOutA" (ByVal hDC As Long, ByVal X As Long, ByVal Y As Long, ByVal lpString As String, ByVal nCount As Long) As Long
Public Sub TextToPictureBox(txtSource As textbox, picDestination As PictureBox)
'this sub will take the text in our textbox and draw it to our
'picturebox. first you will see that i reset the backcolor of
'the picturebox. i do this so that our picturebox is "erased"
'before we draw to it instead of drawing on top of our old text.
'after using the textout api, notice that i will refresh the
'picturebox. this is necessary since i have the picturebox's